% Jenny's Fourth Font
if unknown cmbase: input cmbase fi

font_identifier:="CMR"; font_size 10pt#;

f=1.59; g=2.154;
u#:=g*20/36pt#;			% unit width
width_adj#:=0pt#;		% width adjustment for certain characters
serif_fit#:=0pt#;		% extra sidebar near lowercase serifs
cap_serif_fit#:=g*5/36pt#;	% extra sidebar near uppercase serifs
letter_fit#:=0pt#;		% extra space added to all sidebars

body_height#:=g*270/36pt#;	% height of tallest characters
asc_height#:=g*250/36pt#;		% height of lowercase ascenders
cap_height#:=g*246/36pt#;		% height of caps
fig_height#:=g*232/36pt#;		% height of numerals
x_height#:=g*155/36pt#;		% height of lowercase without ascenders
math_axis#:=g*90/36pt#;		% axis of symmetry for math symbols
bar_height#:=g*87/36pt#;		% height of crossbar in lowercase e
comma_depth#:=g*70/36pt#;		% depth of comma below baseline
desc_depth#:=g*70/36pt#;		% depth of lowercase descenders

crisp#:=0pt#;			% diameter of serif corners
tiny#:=f*8/36pt#;			% diameter of rounded corners
fine#:=f*7/36pt#;			% diameter of sharply rounded corners
thin_join#:=f*7/36pt#;		% width of extrafine details
hair#:=f*9/36pt#;			% lowercase hairline breadth
stem#:=f*25/36pt#;		% lowercase stem breadth
curve#:=f*30/36pt#;		% lowercase curve breadth
ess#:=f*27/36pt#;			% breadth in middle of lowercase s
flare#:=f*33/36pt#;		% diameter of bulbs or breadth of terminals
dot_size#:=f*38/36pt#;		% diameter of dots
cap_hair#:=f*11/36pt#;		% uppercase hairline breadth
cap_stem#:=f*32/36pt#;		% uppercase stem breadth
cap_curve#:=f*37/36pt#;		% uppercase curve breadth
cap_ess#:=f*35/36pt#;		% breadth in middle of uppercase s
rule_thickness#:=f*.4pt#;		% thickness of lines in math symbols

cup#:=g*1/36pt#;			% amount erased at top or bottom of serifs
bracket#:=g*20/36pt#;		% vertical distance from serif base to tangent
jut#:=g*28/36pt#;			% protrusion of lowercase serifs
cap_jut#:=g*37/36pt#;		% protrusion of uppercase serifs
beak_jut#:=g*10/36pt#;		% horizontal protrusion of beak serifs
beak#:=g*70/36pt#;		% vertical protrusion of beak serifs
vair#:=f*8/36pt#;			% vertical diameter of hairlines
notch_cut#:=100pt#;		% maximum breadth above or below notches
bar#:=f*11/36pt#;			% lowercase bar thickness
slab#:=f*11/36pt#;		% serif and arm thickness
cap_bar#:=f*11/36pt#;		% uppercase bar thickness
cap_band#:=f*11/36pt#;		% uppercase thickness above/below lobes
cap_notch_cut#:=100pt#;		% max breadth above/below uppercase notches
serif_drop#:=g*4/36pt#;		% vertical drop of sloped serifs
stem_corr#:=f*1/36pt#;		% for small refinements of stem breadth
vair_corr#:=f*1/36pt#;		% for small refinements of hairline height
apex_corr#:=0pt#;		% extra width at diagonal junctions

o#:=g*8/36pt#;			% amount of overshoot for curves
apex_o#:=g*8/36pt#;		% amount of overshoot for diagonal junctions

slant:=0;			% tilt ratio $(\Delta x/\Delta y)$
fudge:=1;			% factor applied to weights of heavy characters
math_spread:=0;			% extra openness of math symbols
superness:=1/sqrt2;		% parameter for superellipses
superpull:=1/6;			% extra openness inside bowls
beak_darkness:=11/30;		% fraction of triangle inside beak serifs
ligs:=2;			% level of ligatures to be included

square_dots:=false;		% should dots be square?
hefty:=false;			% should we try hard not to be overweight?
serifs:=true;			% should serifs and bulbs be attached?
monospace:=false;		% should all characters have the same width?
variant_g:=false;		% should an italic-style g be used?
low_asterisk:=false;		% should the asterisk be centered at the axis?
math_fitting:=false;		% should math-mode spacing be used?

generate roman			% use the file roman.mf to generate a font